home *** CD-ROM | disk | FTP | other *** search
/ EROS 2 / EROS 2.iso / mac / EROS vol.2 / EROS vol.DXR / 00053.ls < prev    next >
Encoding:
Text File  |  1995-12-20  |  402 b   |  12 lines
  1. on mouseUp
  2.   global md1
  3.   if the castNum of sprite 6 = the number of cast "tfend" then
  4.     set md1 to the duration of cast the number of cast "tfstart" - 3
  5.     set the castNum of sprite 6 to the number of cast "tfstart"
  6.   else
  7.     set the castNum of sprite 6 to the castNum of sprite 6 + 1
  8.     set md1 to the duration of cast the castNum of sprite 6 - 3
  9.     puppetTransition(5, 0, 240, 0)
  10.   end if
  11. end
  12.